/ Game.EXE 2004 July / My Disc.iso / patch / UT2004 / ut2004-winpatch3236.exe / UT2004-Patch / System / XAdmin.u / ConfigSet_xAdminConfigIni_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 4c 45 2f 2f 20 3d 3d 3d |........|LE// ===|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 0d 0a 2f 2f 20 20 43 | 6c 61 73 73 3a 20 20 58 |=..//  C|lass:  X|
|00000060| 41 64 6d 69 6e 2e 78 41 | 64 6d 69 6e 43 6f 6e 66 |Admin.xA|dminConf|
|00000070| 69 67 49 6e 69 0d 0a 2f | 2f 20 20 50 61 72 65 6e |igIni../|/  Paren|
|00000080| 74 3a 20 45 6e 67 69 6e | 65 2e 78 41 64 6d 69 6e |t: Engin|e.xAdmin|
|00000090| 43 6f 6e 66 69 67 42 61 | 73 65 0d 0a 2f 2f 0d 0a |ConfigBa|se..//..|
|000000a0| 2f 2f 20 20 52 65 74 61 | 69 6e 73 20 74 68 65 20 |//  Reta|ins the |
|000000b0| 6c 69 73 74 20 6f 66 20 | 41 64 6d 69 6e 20 55 73 |list of |Admin Us|
|000000c0| 65 72 73 20 61 6e 64 20 | 47 72 6f 75 70 73 20 61 |ers and |Groups a|
|000000d0| 6e 64 20 6b 65 65 70 73 | 20 74 68 65 6d 20 69 6e |nd keeps| them in|
|000000e0| 74 6f 20 61 6e 0d 0a 2f | 2f 20 20 49 6e 69 20 66 |to an../|/  Ini f|
|000000f0| 69 6c 65 2e 0d 0a 2f 2f | 20 3d 3d 3d 3d 3d 3d 3d |ile...//| =======|
|00000100| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000110| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000120| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000130| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 0a 0d |========|=====...|
|00000140| 0a 63 6c 61 73 73 20 78 | 41 64 6d 69 6e 43 6f 6e |.class x|AdminCon|
|00000150| 66 69 67 49 6e 69 20 65 | 78 74 65 6e 64 73 20 78 |figIni e|xtends x|
|00000160| 41 64 6d 69 6e 43 6f 6e | 66 69 67 42 61 73 65 0d |AdminCon|figBase.|
|00000170| 0a 09 43 6f 6e 66 69 67 | 28 78 41 64 6d 69 6e 29 |..Config|(xAdmin)|
|00000180| 0d 0a 09 50 61 72 73 65 | 43 6f 6e 66 69 67 3b 0d |...Parse|Config;.|
|00000190| 0a 0d 0a 73 74 72 75 63 | 74 20 41 64 6d 69 6e 55 |...struc|t AdminU|
|000001a0| 73 65 72 0d 0a 7b 0d 0a | 09 76 61 72 20 73 74 72 |ser..{..|.var str|
|000001b0| 69 6e 67 09 09 09 41 64 | 6d 69 6e 4e 61 6d 65 3b |ing...Ad|minName;|
|000001c0| 0d 0a 09 76 61 72 20 73 | 74 72 69 6e 67 09 09 09 |...var s|tring...|
|000001d0| 50 61 73 73 77 6f 72 64 | 3b 0d 0a 09 76 61 72 20 |Password|;...var |
|000001e0| 73 74 72 69 6e 67 09 09 | 09 50 72 69 76 69 6c 65 |string..|.Privile|
|000001f0| 67 65 73 3b 0d 0a 09 76 | 61 72 20 61 72 72 61 79 |ges;...v|ar array|
|00000200| 3c 73 74 72 69 6e 67 3e | 09 47 72 6f 75 70 73 3b |<string>|.Groups;|
|00000210| 09 09 09 2f 2f 20 41 20 | 55 73 65 72 20 63 61 6e |...// A |User can|
|00000220| 20 62 65 20 70 61 72 74 | 20 6f 66 20 6d 75 6c 74 | be part| of mult|
|00000230| 69 70 6c 65 20 67 72 6f | 75 70 73 0d 0a 09 76 61 |iple gro|ups...va|
|00000240| 72 20 61 72 72 61 79 3c | 73 74 72 69 6e 67 3e 09 |r array<|string>.|
|00000250| 4d 61 6e 61 67 65 64 47 | 72 6f 75 70 73 3b 0d 0a |ManagedG|roups;..|
|00000260| 7d 3b 0d 0a 0d 0a 73 74 | 72 75 63 74 20 41 64 6d |};....st|ruct Adm|
|00000270| 69 6e 47 72 6f 75 70 0d | 0a 7b 0d 0a 09 76 61 72 |inGroup.|.{...var|
|00000280| 20 73 74 72 69 6e 67 09 | 47 72 6f 75 70 4e 61 6d | string.|GroupNam|
|00000290| 65 3b 0d 0a 09 76 61 72 | 20 73 74 72 69 6e 67 09 |e;...var| string.|
|000002a0| 50 72 69 76 69 6c 65 67 | 65 73 3b 0d 0a 09 76 61 |Privileg|es;...va|
|000002b0| 72 20 62 79 74 65 09 47 | 61 6d 65 53 65 63 4c 65 |r byte.G|ameSecLe|
|000002c0| 76 65 6c 3b 0d 0a 7d 3b | 0d 0a 0d 0a 76 61 72 20 |vel;..};|....var |
|000002d0| 63 6f 6e 66 69 67 20 61 | 72 72 61 79 3c 41 64 6d |config a|rray<Adm|
|000002e0| 69 6e 55 73 65 72 3e 09 | 09 41 64 6d 69 6e 55 73 |inUser>.|.AdminUs|
|000002f0| 65 72 73 3b 0d 0a 76 61 | 72 20 63 6f 6e 66 69 67 |ers;..va|r config|
|00000300| 20 61 72 72 61 79 3c 41 | 64 6d 69 6e 47 72 6f 75 | array<A|dminGrou|
|00000310| 70 3e 09 41 64 6d 69 6e | 47 72 6f 75 70 73 3b 0d |p>.Admin|Groups;.|
|00000320| 0a 0d 0a 2f 2f 20 54 4f | 44 4f 3a 20 44 65 66 69 |...// TO|DO: Defi|
|00000330| 6e 65 20 77 68 65 6e 20 | 69 74 20 73 68 6f 75 6c |ne when |it shoul|
|00000340| 64 20 72 65 74 75 72 6e | 20 66 61 6c 73 65 0d 0a |d return| false..|
|00000350| 73 74 61 74 69 63 20 66 | 75 6e 63 74 69 6f 6e 20 |static f|unction |
|00000360| 62 6f 6f 6c 20 4c 6f 61 | 64 28 78 41 64 6d 69 6e |bool Loa|d(xAdmin|
|00000370| 55 73 65 72 4c 69 73 74 | 20 55 73 65 72 73 2c 20 |UserList| Users, |
|00000380| 78 41 64 6d 69 6e 47 72 | 6f 75 70 4c 69 73 74 20 |xAdminGr|oupList |
|00000390| 47 72 6f 75 70 73 2c 20 | 62 6f 6f 6c 20 62 44 6f |Groups, |bool bDo|
|000003a0| 6e 74 41 64 64 44 65 66 | 61 75 6c 74 41 64 6d 69 |ntAddDef|aultAdmi|
|000003b0| 6e 29 0d 0a 7b 0d 0a 6c | 6f 63 61 6c 20 69 6e 74 |n)..{..l|ocal int|
|000003c0| 20 69 3b 0d 0a 6c 6f 63 | 61 6c 20 78 41 64 6d 69 | i;..loc|al xAdmi|
|000003d0| 6e 55 73 65 72 09 4e 65 | 77 55 73 65 72 3b 0d 0a |nUser.Ne|wUser;..|
|000003e0| 6c 6f 63 61 6c 20 78 41 | 64 6d 69 6e 47 72 6f 75 |local xA|dminGrou|
|000003f0| 70 09 4e 65 77 47 72 6f | 75 70 3b 0d 0a 6c 6f 63 |p.NewGro|up;..loc|
|00000400| 61 6c 20 41 64 6d 69 6e | 55 73 65 72 09 09 55 73 |al Admin|User..Us|
|00000410| 65 72 3b 0d 0a 6c 6f 63 | 61 6c 20 41 64 6d 69 6e |er;..loc|al Admin|
|00000420| 47 72 6f 75 70 09 47 72 | 6f 75 70 3b 0d 0a 6c 6f |Group.Gr|oup;..lo|
|00000430| 63 61 6c 20 62 6f 6f 6c | 09 09 09 62 44 69 72 74 |cal bool|...bDirt|
|00000440| 79 3b 0d 0a 0d 0a 09 4c | 6f 67 28 22 4c 6f 61 64 |y;.....L|og("Load|
|00000450| 69 6e 67 20 41 64 6d 69 | 6e 73 20 26 20 47 72 6f |ing Admi|ns & Gro|
|00000460| 75 70 73 22 29 3b 0d 0a | 0d 0a 09 2f 2f 20 53 74 |ups");..|...// St|
|00000470| 61 72 74 20 77 69 74 68 | 20 63 6f 6e 76 65 72 74 |art with| convert|
|00000480| 69 6e 67 20 67 72 6f 75 | 70 73 0d 0a 09 66 6f 72 |ing grou|ps...for|
|00000490| 20 28 69 20 3d 20 30 3b | 20 69 3c 44 65 66 61 75 | (i = 0;| i<Defau|
|000004a0| 6c 74 2e 41 64 6d 69 6e | 47 72 6f 75 70 73 2e 4c |lt.Admin|Groups.L|
|000004b0| 65 6e 67 74 68 3b 20 69 | 2b 2b 29 0d 0a 09 7b 0d |ength; i|++)...{.|
|000004c0| 0a 09 09 2f 2f 20 4d 61 | 6b 65 20 73 75 72 65 20 |...// Ma|ke sure |
|000004d0| 61 20 67 72 6f 75 70 20 | 77 61 73 6e 74 20 61 6c |a group |wasnt al|
|000004e0| 72 65 61 64 79 20 61 64 | 64 65 64 20 77 69 74 68 |ready ad|ded with|
|000004f0| 20 61 20 67 69 76 65 6e | 20 6e 61 6d 65 20 28 6d | a given| name (m|
|00000500| 61 6e 75 61 6c 20 74 61 | 6d 70 65 72 69 6e 67 20 |anual ta|mpering |
|00000510| 6f 66 20 69 6e 69 20 66 | 69 6c 65 29 0d 0a 09 09 |of ini f|ile)....|
|00000520| 47 72 6f 75 70 20 3d 20 | 44 65 66 61 75 6c 74 2e |Group = |Default.|
|00000530| 41 64 6d 69 6e 47 72 6f | 75 70 73 5b 69 5d 3b 0d |AdminGro|ups[i];.|
|00000540| 0a 09 09 69 66 20 28 47 | 72 6f 75 70 73 2e 46 69 |...if (G|roups.Fi|
|00000550| 6e 64 42 79 4e 61 6d 65 | 28 47 72 6f 75 70 2e 47 |ndByName|(Group.G|
|00000560| 72 6f 75 70 4e 61 6d 65 | 29 20 3d 3d 20 4e 6f 6e |roupName|) == Non|
|00000570| 65 29 0d 0a 09 09 7b 0d | 0a 09 09 09 4e 65 77 47 |e)....{.|....NewG|
|00000580| 72 6f 75 70 20 3d 20 47 | 72 6f 75 70 73 2e 43 72 |roup = G|roups.Cr|
|00000590| 65 61 74 65 47 72 6f 75 | 70 28 47 72 6f 75 70 2e |eateGrou|p(Group.|
|000005a0| 47 72 6f 75 70 4e 61 6d | 65 2c 20 47 72 6f 75 70 |GroupNam|e, Group|
|000005b0| 2e 50 72 69 76 69 6c 65 | 67 65 73 2c 20 47 72 6f |.Privile|ges, Gro|
|000005c0| 75 70 2e 47 61 6d 65 53 | 65 63 4c 65 76 65 6c 29 |up.GameS|ecLevel)|
|000005d0| 3b 0d 0a 09 09 09 47 72 | 6f 75 70 73 2e 41 64 64 |;.....Gr|oups.Add|
|000005e0| 28 4e 65 77 47 72 6f 75 | 70 29 3b 0d 0a 09 09 7d |(NewGrou|p);....}|
|000005f0| 0d 0a 09 7d 0d 0a 09 2f | 2f 20 49 66 20 74 68 65 |...}.../|/ If the|
|00000600| 72 65 20 61 72 65 20 4e | 6f 20 47 72 6f 75 70 73 |re are N|o Groups|
|00000610| 2c 20 43 72 65 61 74 65 | 20 61 20 64 65 66 61 75 |, Create| a defau|
|00000620| 6c 74 20 47 72 6f 75 70 | 20 28 41 64 6d 69 6e 29 |lt Group| (Admin)|
|00000630| 0d 0a 09 69 66 20 28 47 | 72 6f 75 70 73 2e 43 6f |...if (G|roups.Co|
|00000640| 75 6e 74 28 29 20 3d 3d | 20 30 20 7c 7c 20 47 72 |unt() ==| 0 || Gr|
|00000650| 6f 75 70 73 2e 46 69 6e | 64 42 79 4e 61 6d 65 28 |oups.Fin|dByName(|
|00000660| 22 41 64 6d 69 6e 22 29 | 20 3d 3d 20 4e 6f 6e 65 |"Admin")| == None|
|00000670| 29 0d 0a 09 7b 0d 0a 09 | 09 4c 6f 67 28 22 43 72 |)...{...|.Log("Cr|
|00000680| 65 61 74 69 6e 67 20 41 | 64 6d 69 6e 20 47 72 6f |eating A|dmin Gro|
|00000690| 75 70 22 29 3b 0d 0a 09 | 09 47 72 6f 75 70 73 2e |up");...|.Groups.|
|000006a0| 41 64 64 28 47 72 6f 75 | 70 73 2e 43 72 65 61 74 |Add(Grou|ps.Creat|
|000006b0| 65 47 72 6f 75 70 28 22 | 41 64 6d 69 6e 22 2c 20 |eGroup("|Admin", |
|000006c0| 22 22 2c 20 32 35 35 29 | 29 3b 0d 0a 09 09 47 72 |"", 255)|);....Gr|
|000006d0| 6f 75 70 73 2e 41 64 64 | 28 47 72 6f 75 70 73 2e |oups.Add|(Groups.|
|000006e0| 43 72 65 61 74 65 47 72 | 6f 75 70 28 22 4d 61 74 |CreateGr|oup("Mat|
|000006f0| 63 68 53 65 74 75 70 22 | 2c 20 22 58 6d 22 2c 20 |chSetup"|, "Xm", |
|00000700| 32 34 30 29 29 3b 0d 0a | 09 09 62 44 69 72 74 79 |240));..|..bDirty|
|00000710| 20 3d 20 74 72 75 65 3b | 0d 0a 09 7d 0d 0a 0d 0a | = true;|...}....|
|00000720| 09 2f 2f 20 54 68 65 6e | 2c 20 63 6f 6e 76 65 72 |.// Then|, conver|
|00000730| 74 20 65 61 63 68 20 55 | 73 65 72 0d 0a 09 66 6f |t each U|ser...fo|
|00000740| 72 20 28 69 20 3d 20 30 | 3b 20 69 3c 44 65 66 61 |r (i = 0|; i<Defa|
|00000750| 75 6c 74 2e 41 64 6d 69 | 6e 55 73 65 72 73 2e 4c |ult.Admi|nUsers.L|
|00000760| 65 6e 67 74 68 3b 20 69 | 2b 2b 29 0d 0a 09 7b 0d |ength; i|++)...{.|
|00000770| 0a 09 09 2f 2f 20 4d 61 | 6b 65 20 73 75 72 65 20 |...// Ma|ke sure |
|00000780| 74 68 61 74 20 61 20 75 | 73 65 72 20 77 69 74 68 |that a u|ser with|
|00000790| 20 74 68 61 74 20 6e 61 | 6d 65 20 77 61 73 6e 74 | that na|me wasnt|
|000007a0| 20 61 6c 72 65 61 64 79 | 20 61 64 64 65 64 0d 0a | already| added..|
|000007b0| 09 09 55 73 65 72 20 3d | 20 44 65 66 61 75 6c 74 |..User =| Default|
|000007c0| 2e 41 64 6d 69 6e 55 73 | 65 72 73 5b 69 5d 3b 0d |.AdminUs|ers[i];.|
|000007d0| 0a 09 09 69 66 20 28 55 | 73 65 72 73 2e 46 69 6e |...if (U|sers.Fin|
|000007e0| 64 42 79 4e 61 6d 65 28 | 55 73 65 72 2e 41 64 6d |dByName(|User.Adm|
|000007f0| 69 6e 4e 61 6d 65 29 20 | 3d 3d 20 4e 6f 6e 65 29 |inName) |== None)|
|00000800| 0d 0a 09 09 7b 0d 0a 09 | 09 09 4e 65 77 55 73 65 |....{...|..NewUse|
|00000810| 72 20 3d 20 55 73 65 72 | 73 2e 43 72 65 61 74 65 |r = User|s.Create|
|00000820| 28 55 73 65 72 2e 41 64 | 6d 69 6e 4e 61 6d 65 2c |(User.Ad|minName,|
|00000830| 20 55 73 65 72 2e 50 61 | 73 73 77 6f 72 64 2c 20 | User.Pa|ssword, |
|00000840| 55 73 65 72 2e 50 72 69 | 76 69 6c 65 67 65 73 29 |User.Pri|vileges)|
|00000850| 3b 0d 0a 09 09 09 69 66 | 20 28 4e 65 77 55 73 65 |;.....if| (NewUse|
|00000860| 72 20 21 3d 20 4e 6f 6e | 65 29 0d 0a 09 09 09 7b |r != Non|e).....{|
|00000870| 0d 0a 09 09 09 09 4e 65 | 77 55 73 65 72 2e 41 64 |......Ne|wUser.Ad|
|00000880| 64 47 72 6f 75 70 73 42 | 79 4e 61 6d 65 28 47 72 |dGroupsB|yName(Gr|
|00000890| 6f 75 70 73 2c 20 55 73 | 65 72 2e 47 72 6f 75 70 |oups, Us|er.Group|
|000008a0| 73 29 3b 0d 0a 09 09 09 | 09 4e 65 77 55 73 65 72 |s);.....|.NewUser|
|000008b0| 2e 41 64 64 4d 61 6e 61 | 67 65 64 47 72 6f 75 70 |.AddMana|gedGroup|
|000008c0| 73 42 79 4e 61 6d 65 28 | 47 72 6f 75 70 73 2c 20 |sByName(|Groups, |
|000008d0| 55 73 65 72 2e 4d 61 6e | 61 67 65 64 47 72 6f 75 |User.Man|agedGrou|
|000008e0| 70 73 29 3b 0d 0a 0d 0a | 09 09 09 09 55 73 65 72 |ps);....|....User|
|000008f0| 73 2e 41 64 64 28 4e 65 | 77 55 73 65 72 29 3b 0d |s.Add(Ne|wUser);.|
|00000900| 0a 09 09 09 7d 0d 0a 09 | 09 7d 0d 0a 09 7d 0d 0a |....}...|.}...}..|
|00000910| 09 2f 2f 20 69 66 20 74 | 68 65 72 65 20 61 72 65 |.// if t|here are|
|00000920| 20 6e 6f 20 55 73 65 72 | 73 2c 20 43 72 65 61 74 | no User|s, Creat|
|00000930| 65 20 61 20 64 65 66 61 | 75 6c 74 20 55 73 65 72 |e a defa|ult User|
|00000940| 20 28 41 64 6d 69 6e 29 | 0d 0a 09 69 66 20 28 55 | (Admin)|...if (U|
|00000950| 73 65 72 73 2e 43 6f 75 | 6e 74 28 29 20 3d 3d 20 |sers.Cou|nt() == |
|00000960| 30 20 26 26 20 21 62 44 | 6f 6e 74 41 64 64 44 65 |0 && !bD|ontAddDe|
|00000970| 66 61 75 6c 74 41 64 6d | 69 6e 29 0d 0a 09 7b 0d |faultAdm|in)...{.|
|00000980| 0a 09 09 4e 65 77 55 73 | 65 72 20 3d 20 55 73 65 |...NewUs|er = Use|
|00000990| 72 73 2e 43 72 65 61 74 | 65 28 22 41 64 6d 69 6e |rs.Creat|e("Admin|
|000009a0| 22 2c 20 22 41 64 6d 69 | 6e 22 2c 20 22 22 29 3b |", "Admi|n", "");|
|000009b0| 0d 0a 09 09 4e 65 77 55 | 73 65 72 2e 41 64 64 47 |....NewU|ser.AddG|
|000009c0| 72 6f 75 70 28 47 72 6f | 75 70 73 2e 46 69 6e 64 |roup(Gro|ups.Find|
|000009d0| 42 79 4e 61 6d 65 28 22 | 41 64 6d 69 6e 22 29 29 |ByName("|Admin"))|
|000009e0| 3b 0d 0a 09 09 55 73 65 | 72 73 2e 41 64 64 28 4e |;....Use|rs.Add(N|
|000009f0| 65 77 55 73 65 72 29 3b | 0d 0a 09 09 62 44 69 72 |ewUser);|....bDir|
|00000a00| 74 79 20 3d 20 74 72 75 | 65 3b 0d 0a 09 7d 0d 0a |ty = tru|e;...}..|
|00000a10| 0d 0a 09 69 66 20 28 62 | 44 69 72 74 79 29 0d 0a |...if (b|Dirty)..|
|00000a20| 09 09 53 61 76 65 28 55 | 73 65 72 73 2c 20 47 72 |..Save(U|sers, Gr|
|00000a30| 6f 75 70 73 29 3b 0d 0a | 0d 0a 09 72 65 74 75 72 |oups);..|...retur|
|00000a40| 6e 20 74 72 75 65 3b 0d | 0a 7d 0d 0a 0d 0a 73 74 |n true;.|.}....st|
|00000a50| 61 74 69 63 20 66 75 6e | 63 74 69 6f 6e 20 62 6f |atic fun|ction bo|
|00000a60| 6f 6c 20 53 61 76 65 28 | 78 41 64 6d 69 6e 55 73 |ol Save(|xAdminUs|
|00000a70| 65 72 4c 69 73 74 20 55 | 73 65 72 73 2c 20 78 41 |erList U|sers, xA|
|00000a80| 64 6d 69 6e 47 72 6f 75 | 70 4c 69 73 74 20 47 72 |dminGrou|pList Gr|
|00000a90| 6f 75 70 73 29 0d 0a 7b | 0d 0a 6c 6f 63 61 6c 20 |oups)..{|..local |
|00000aa0| 69 6e 74 20 69 2c 20 6a | 2c 20 47 72 70 4c 65 6e |int i, j|, GrpLen|
|00000ab0| 2c 20 55 73 65 72 4c 65 | 6e 3b 0d 0a 6c 6f 63 61 |, UserLe|n;..loca|
|00000ac0| 6c 20 78 41 64 6d 69 6e | 55 73 65 72 20 55 73 65 |l xAdmin|User Use|
|00000ad0| 72 3b 0d 0a 6c 6f 63 61 | 6c 20 78 41 64 6d 69 6e |r;..loca|l xAdmin|
|00000ae0| 47 72 6f 75 70 20 47 72 | 6f 75 70 3b 0d 0a 0d 0a |Group Gr|oup;....|
|00000af0| 09 2f 2f 20 46 69 78 20 | 74 68 65 20 73 69 7a 65 |.// Fix |the size|
|00000b00| 73 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |s of the| current|
|00000b10| 20 73 74 72 75 63 74 75 | 72 65 20 6c 69 73 74 73 | structu|re lists|
|00000b20| 0d 0a 09 44 65 66 61 75 | 6c 74 2e 41 64 6d 69 6e |...Defau|lt.Admin|
|00000b30| 55 73 65 72 73 2e 4c 65 | 6e 67 74 68 20 3d 20 55 |Users.Le|ngth = U|
|00000b40| 73 65 72 73 2e 43 6f 75 | 6e 74 28 29 3b 0d 0a 09 |sers.Cou|nt();...|
|00000b50| 44 65 66 61 75 6c 74 2e | 41 64 6d 69 6e 47 72 6f |Default.|AdminGro|
|00000b60| 75 70 73 2e 4c 65 6e 67 | 74 68 20 3d 20 47 72 6f |ups.Leng|th = Gro|
|00000b70| 75 70 73 2e 43 6f 75 6e | 74 28 29 3b 0d 0a 0d 0a |ups.Coun|t();....|
|00000b80| 09 2f 2f 20 52 65 62 75 | 69 6c 64 20 74 68 65 20 |.// Rebu|ild the |
|00000b90| 6c 69 73 74 20 6f 66 20 | 41 64 6d 69 6e 47 72 6f |list of |AdminGro|
|00000ba0| 75 70 73 20 62 61 73 65 | 64 20 6f 6e 20 63 75 72 |ups base|d on cur|
|00000bb0| 72 65 6e 74 20 69 6e 74 | 65 72 6e 61 6c 20 6c 69 |rent int|ernal li|
|00000bc0| 73 74 0d 0a 09 47 72 70 | 4c 65 6e 20 3d 20 30 3b |st...Grp|Len = 0;|
|00000bd0| 0d 0a 09 66 6f 72 20 28 | 69 3d 30 3b 20 69 3c 47 |...for (|i=0; i<G|
|00000be0| 72 6f 75 70 73 2e 43 6f | 75 6e 74 28 29 3b 20 69 |roups.Co|unt(); i|
|00000bf0| 2b 2b 29 0d 0a 09 7b 0d | 0a 09 09 47 72 6f 75 70 |++)...{.|...Group|
|00000c00| 20 3d 20 47 72 6f 75 70 | 73 2e 47 65 74 28 69 29 | = Group|s.Get(i)|
|00000c10| 3b 0d 0a 09 09 69 66 20 | 28 47 72 6f 75 70 2e 47 |;....if |(Group.G|
|00000c20| 72 6f 75 70 4e 61 6d 65 | 20 21 3d 20 22 55 52 4c |roupName| != "URL|
|00000c30| 3a 3a 41 64 6d 69 6e 22 | 29 0d 0a 09 09 7b 0d 0a |::Admin"|)....{..|
|00000c40| 09 09 09 44 65 66 61 75 | 6c 74 2e 41 64 6d 69 6e |...Defau|lt.Admin|
|00000c50| 47 72 6f 75 70 73 5b 47 | 72 70 4c 65 6e 5d 2e 47 |Groups[G|rpLen].G|
|00000c60| 72 6f 75 70 4e 61 6d 65 | 20 3d 20 47 72 6f 75 70 |roupName| = Group|
|00000c70| 2e 47 72 6f 75 70 4e 61 | 6d 65 3b 0d 0a 09 09 09 |.GroupNa|me;.....|
|00000c80| 44 65 66 61 75 6c 74 2e | 41 64 6d 69 6e 47 72 6f |Default.|AdminGro|
|00000c90| 75 70 73 5b 47 72 70 4c | 65 6e 5d 2e 50 72 69 76 |ups[GrpL|en].Priv|
|00000ca0| 69 6c 65 67 65 73 20 3d | 20 47 72 6f 75 70 2e 50 |ileges =| Group.P|
|00000cb0| 72 69 76 69 6c 65 67 65 | 73 3b 0d 0a 09 09 09 44 |rivilege|s;.....D|
|00000cc0| 65 66 61 75 6c 74 2e 41 | 64 6d 69 6e 47 72 6f 75 |efault.A|dminGrou|
|00000cd0| 70 73 5b 47 72 70 4c 65 | 6e 5d 2e 47 61 6d 65 53 |ps[GrpLe|n].GameS|
|00000ce0| 65 63 4c 65 76 65 6c 20 | 3d 20 47 72 6f 75 70 2e |ecLevel |= Group.|
|00000cf0| 47 61 6d 65 53 65 63 4c | 65 76 65 6c 3b 0d 0a 09 |GameSecL|evel;...|
|00000d00| 09 09 47 72 70 4c 65 6e | 2b 2b 3b 0d 0a 09 09 7d |..GrpLen|++;....}|
|00000d10| 0d 0a 09 7d 0d 0a 09 44 | 65 66 61 75 6c 74 2e 41 |...}...D|efault.A|
|00000d20| 64 6d 69 6e 47 72 6f 75 | 70 73 2e 4c 65 6e 67 74 |dminGrou|ps.Lengt|
|00000d30| 68 20 3d 20 47 72 70 4c | 65 6e 3b 0d 0a 0d 0a 09 |h = GrpL|en;.....|
|00000d40| 2f 2f 20 52 65 62 75 69 | 6c 64 20 74 68 65 20 6c |// Rebui|ld the l|
|00000d50| 69 73 74 20 6f 66 20 41 | 64 6d 69 6e 55 73 65 72 |ist of A|dminUser|
|00000d60| 73 20 62 61 73 65 64 20 | 6f 6e 20 63 75 72 72 65 |s based |on curre|
|00000d70| 6e 74 20 69 6e 74 65 72 | 6e 61 6c 20 6c 69 73 74 |nt inter|nal list|
|00000d80| 0d 0a 09 55 73 65 72 4c | 65 6e 20 3d 20 30 3b 0d |...UserL|en = 0;.|
|00000d90| 0a 09 66 6f 72 20 28 69 | 3d 30 3b 20 69 3c 55 73 |..for (i|=0; i<Us|
|00000da0| 65 72 73 2e 43 6f 75 6e | 74 28 29 3b 20 69 2b 2b |ers.Coun|t(); i++|
|00000db0| 29 0d 0a 09 7b 0d 0a 09 | 09 55 73 65 72 20 3d 20 |)...{...|.User = |
|00000dc0| 55 73 65 72 73 2e 47 65 | 74 28 69 29 3b 0d 0a 09 |Users.Ge|t(i);...|
|00000dd0| 09 69 66 20 28 55 73 65 | 72 2e 47 65 74 47 72 6f |.if (Use|r.GetGro|
|00000de0| 75 70 28 22 55 52 4c 3a | 3a 41 64 6d 69 6e 22 29 |up("URL:|:Admin")|
|00000df0| 20 3d 3d 20 4e 6f 6e 65 | 29 0d 0a 09 09 7b 0d 0a | == None|)....{..|
|00000e00| 09 09 09 44 65 66 61 75 | 6c 74 2e 41 64 6d 69 6e |...Defau|lt.Admin|
|00000e10| 55 73 65 72 73 5b 55 73 | 65 72 4c 65 6e 5d 2e 41 |Users[Us|erLen].A|
|00000e20| 64 6d 69 6e 4e 61 6d 65 | 20 3d 20 55 73 65 72 2e |dminName| = User.|
|00000e30| 55 73 65 72 4e 61 6d 65 | 3b 0d 0a 09 09 09 44 65 |UserName|;.....De|
|00000e40| 66 61 75 6c 74 2e 41 64 | 6d 69 6e 55 73 65 72 73 |fault.Ad|minUsers|
|00000e50| 5b 55 73 65 72 4c 65 6e | 5d 2e 50 61 73 73 77 6f |[UserLen|].Passwo|
|00000e60| 72 64 20 3d 20 55 73 65 | 72 2e 50 61 73 73 77 6f |rd = Use|r.Passwo|
|00000e70| 72 64 3b 0d 0a 09 09 09 | 44 65 66 61 75 6c 74 2e |rd;.....|Default.|
|00000e80| 41 64 6d 69 6e 55 73 65 | 72 73 5b 55 73 65 72 4c |AdminUse|rs[UserL|
|00000e90| 65 6e 5d 2e 50 72 69 76 | 69 6c 65 67 65 73 20 3d |en].Priv|ileges =|
|00000ea0| 20 55 73 65 72 2e 50 72 | 69 76 69 6c 65 67 65 73 | User.Pr|ivileges|
|00000eb0| 3b 0d 0a 0d 0a 09 09 09 | 69 66 20 28 55 73 65 72 |;.......|if (User|
|00000ec0| 2e 47 72 6f 75 70 73 20 | 21 3d 20 4e 6f 6e 65 20 |.Groups |!= None |
|00000ed0| 26 26 20 55 73 65 72 2e | 47 72 6f 75 70 73 2e 43 |&& User.|Groups.C|
|00000ee0| 6f 75 6e 74 28 29 20 3e | 20 30 29 0d 0a 09 09 09 |ount() >| 0).....|
|00000ef0| 7b 0d 0a 09 09 09 09 44 | 65 66 61 75 6c 74 2e 41 |{......D|efault.A|
|00000f00| 64 6d 69 6e 55 73 65 72 | 73 5b 55 73 65 72 4c 65 |dminUser|s[UserLe|
|00000f10| 6e 5d 2e 47 72 6f 75 70 | 73 2e 4c 65 6e 67 74 68 |n].Group|s.Length|
|00000f20| 20 3d 20 55 73 65 72 2e | 47 72 6f 75 70 73 2e 43 | = User.|Groups.C|
|00000f30| 6f 75 6e 74 28 29 3b 0d | 0a 09 09 09 09 66 6f 72 |ount();.|.....for|
|00000f40| 20 28 6a 20 3d 20 30 3b | 20 6a 3c 55 73 65 72 2e | (j = 0;| j<User.|
|00000f50| 47 72 6f 75 70 73 2e 43 | 6f 75 6e 74 28 29 3b 20 |Groups.C|ount(); |
|00000f60| 6a 2b 2b 29 0d 0a 09 09 | 09 09 09 44 65 66 61 75 |j++)....|...Defau|
|00000f70| 6c 74 2e 41 64 6d 69 6e | 55 73 65 72 73 5b 55 73 |lt.Admin|Users[Us|
|00000f80| 65 72 4c 65 6e 5d 2e 47 | 72 6f 75 70 73 5b 6a 5d |erLen].G|roups[j]|
|00000f90| 20 3d 20 55 73 65 72 2e | 47 72 6f 75 70 73 2e 47 | = User.|Groups.G|
|00000fa0| 65 74 28 6a 29 2e 47 72 | 6f 75 70 4e 61 6d 65 3b |et(j).Gr|oupName;|
|00000fb0| 0d 0a 09 09 09 7d 0d 0a | 09 09 09 69 66 20 28 55 |.....}..|...if (U|
|00000fc0| 73 65 72 2e 4d 61 6e 61 | 67 65 64 47 72 6f 75 70 |ser.Mana|gedGroup|
|00000fd0| 73 20 21 3d 20 4e 6f 6e | 65 20 26 26 20 55 73 65 |s != Non|e && Use|
|00000fe0| 72 2e 4d 61 6e 61 67 65 | 64 47 72 6f 75 70 73 2e |r.Manage|dGroups.|
|00000ff0| 43 6f 75 6e 74 28 29 20 | 3e 20 30 29 0d 0a 09 09 |Count() |> 0)....|
|00001000| 09 7b 0d 0a 09 09 09 09 | 44 65 66 61 75 6c 74 2e |.{......|Default.|
|00001010| 41 64 6d 69 6e 55 73 65 | 72 73 5b 55 73 65 72 4c |AdminUse|rs[UserL|
|00001020| 65 6e 5d 2e 4d 61 6e 61 | 67 65 64 47 72 6f 75 70 |en].Mana|gedGroup|
|00001030| 73 2e 4c 65 6e 67 74 68 | 20 3d 20 55 73 65 72 2e |s.Length| = User.|
|00001040| 4d 61 6e 61 67 65 64 47 | 72 6f 75 70 73 2e 43 6f |ManagedG|roups.Co|
|00001050| 75 6e 74 28 29 3b 0d 0a | 09 09 09 09 66 6f 72 20 |unt();..|....for |
|00001060| 28 6a 20 3d 20 30 3b 20 | 6a 3c 55 73 65 72 2e 4d |(j = 0; |j<User.M|
|00001070| 61 6e 61 67 65 64 47 72 | 6f 75 70 73 2e 43 6f 75 |anagedGr|oups.Cou|
|00001080| 6e 74 28 29 3b 20 6a 2b | 2b 29 0d 0a 09 09 09 09 |nt(); j+|+)......|
|00001090| 09 44 65 66 61 75 6c 74 | 2e 41 64 6d 69 6e 55 73 |.Default|.AdminUs|
|000010a0| 65 72 73 5b 55 73 65 72 | 4c 65 6e 5d 2e 4d 61 6e |ers[User|Len].Man|
|000010b0| 61 67 65 64 47 72 6f 75 | 70 73 5b 6a 5d 20 3d 20 |agedGrou|ps[j] = |
|000010c0| 55 73 65 72 2e 4d 61 6e | 61 67 65 64 47 72 6f 75 |User.Man|agedGrou|
|000010d0| 70 73 2e 47 65 74 28 6a | 29 2e 47 72 6f 75 70 4e |ps.Get(j|).GroupN|
|000010e0| 61 6d 65 3b 0d 0a 09 09 | 09 7d 0d 0a 09 09 09 55 |ame;....|.}.....U|
|000010f0| 73 65 72 4c 65 6e 2b 2b | 3b 0d 0a 09 09 7d 0d 0a |serLen++|;....}..|
|00001100| 09 7d 0d 0a 09 44 65 66 | 61 75 6c 74 2e 41 64 6d |.}...Def|ault.Adm|
|00001110| 69 6e 55 73 65 72 73 2e | 4c 65 6e 67 74 68 20 3d |inUsers.|Length =|
|00001120| 20 55 73 65 72 4c 65 6e | 3b 0d 0a 0d 0a 09 53 74 | UserLen|;.....St|
|00001130| 61 74 69 63 53 61 76 65 | 43 6f 6e 66 69 67 28 29 |aticSave|Config()|
|00001140| 3b 0d 0a 09 72 65 74 75 | 72 6e 20 74 72 75 65 3b |;...retu|rn true;|
|00001150| 0d 0a 7d 0d 0a 00       |                         |..}...  |        |
+--------+-------------------------+-------------------------+--------+--------+